10 POKE53280,0:POKE53281,0:POKE646,3:POKE53272,23:L=0:W=0:Z=0:C=0
15 PRINT"[147]                                        [146]";
20 PRINT"            [202]AMIE'S [211]PELLING            [146]";
25 PRINT"                                        [146]";
30 PRINT"                                        [146]";
35 PRINT"               [213]NIT [196]-15                [146]";
40 PRINT"                                        [146][159]":GOSUB300
45 REM THIS UNIT PREPARED BY BILL CUMBERLAND 1992:03:13
50 GOSUB700
55 GOSUB 600
60 GOTO1000
200 PRINT"[147][159]              [215][207][210][196][160][204][201][211][212]                 [146]"
205 PRINT" HOLIDAYS   COPIES  GROCERIES  PARTIES
210 [153]" GROCERIES  DUTIES  BIRTHDAYS  HOBBIES
215 PRINT" LIBRARIES  LADIES  BATTERIES  STORIES
220 [153]" HIGHWAYS   DUTIES  CHERRIES   VALLEYS
225 PRINT" COMMUNITIES FLIES  MELODIES   INJURIES":GOSUB400
230 RETURN
240 GOSUB400
245 PRINT"[155]* [215]HICH [204]IST [215]ORD BELONGS TO THIS GROUP?"
255 GOSUB401:GOSUB560:RETURN
270 PRINT"               [195][207][210][210][197][195][212]!                 [146]":GOSUB500:RETURN
280 REM IF X=1THENGOSUB290
282 PRINT"[150]            [215]HOOPS!  [206]O!                [146]":X=X+1:GOSUB530:GOSUB402
284 PRINT"[145][145]            [212]RY AGAIN                   [153]":GOSUB402:GOSUB560
286 PRINT"[145][145]                                        [145][145]"
288 PRINT"[145][145]                                        [145][145]":RETURN
290 PRINT"[150][145][145]>> [212]HE CORRECT WORD IS........       ":GOSUB530
295 PRINT"                                    [145][153]":RETURN
300 GOSUB402:GOSUB560
305 PRINT"[154]      [208]RESS [211][208][193][195][197][160][194][193][210][160]TO CONTINUE       [146][155]"
310 GETR$:IFR$<>CHR$(32)THEN310
315 RETURN
400 FORT=1TO 500:NEXT:RETURN
401 FORT=1TO 1000:NEXT:RETURN
402 FORT=1TO 2000:NEXT:RETURN
403 FORT=1TO 3000:NEXT:RETURN
404 FORT=1TO 4000:NEXT:RETURN
405 FORT=1TO 5000:NEXT:RETURN
500 REM <YES> SOUND
505 S=54272:FORE=STOS+28:POKEE,0:NEXT
510 POKE54296,15:POKE54277,42:POKE54278,250
515 POKE54276,23:POKE54273,23:POKE54272,191
520 FORT=1TO100:NEXT:POKE54276,32:FORT=1TO200:NEXT
525 POKE54296,0:RETURN
530 REM <NO> SOUND
535 S=54272:FORE=STOS+28:POKEE,0:NEXT
540 POKE54296,15:POKE54277,18:POKE54278,242
545 POKE54276,33:POKE54273,4:POKE54272,48
550 FORT=1TO300:NEXT:POKE54276,32:FORT=1TO400:NEXT
555 POKE54296,0:RETURN
560 REM <BLIP> SOUND
565 S=54272:FORE=STOS+28:POKEE,0:NEXT
570 POKE54296,8:POKE54277,42:POKE54278,250
575 POKE54276,23:POKE54273,23:POKE54272,191
580 FORT=1TO30:NEXT:POKE54276,32:FORT=1TO50:NEXT
585 POKE54296,0:RETURN
600 PRINT"[147][153] [212]HERE ARE TWELVE QUESTIONS":GOSUB401
610 PRINT" [217]OUR PERFORMANCE WILL BE SCORED.":GOSUB401
620 GOSUB300
630 PRINT"[147] AND AWAY WE GO .........":GOSUB402:GOSUB500:GOSUB401
640 RETURN
700 PRINT"[147][159]               [199]AME [208]LAN                [146]
705 [153]"  RIGHT$N THIS GAME YOU WILL SELECT A WORD
710 PRINT"  FROM THE [215]ORD [204]IST THAT BELONGS TO
715 [153]"  THE GROUP OF WORDS BEING DISPLAYED."
750 [141]300
755 [142]
1000 [143] # 1
1005 [141]200:[141]240:X[178]0
1010 [153]"PRINT          ... TUNES, SONGS    SYS"
1015 [133] A$
1020 [139]A$[178]"MELODIES"[167] [141]270:[141]402:[137]1035
1025 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1035
1030 Z[178]Z[170]1:[141]280:[137]1015
1035 [153]"              MELODIES"
1040 [141]300
1049 :
1050 [143] # 2
1055 [141]200:[141]240:X[178]0
1060 [153]"PRINT  .... (null)HANKSGIVING, NEW (null)EARS STR$AY   SYS"
1065 [133] A$
1070 [139]A$[178]"HOLIDAYS"[167] [141]270:[141]402:[137]1085
1075 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1085
1080 Z[178]Z[170]1:[141]280:[137]1065
1085 [153]"               HOLIDAYS "
1090 [141]300
1100 [143] # 3
1105 [141]200:[141]240:X[178]0
1110 [153]"PRINT  ... STAMPS,BASEBALL CARDS   SYS"
1115 [133] A$
1120 [139]A$[178]"HOBBIES"[167] [141]270:[141]402:[137]1135
1125 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1135
1130 Z[178]Z[170]1:[141]280:[137]1115
1135 [153]"               HOBBIES  "
1140 [141]300
1149 :
1150 [143] # 4
1155 [141]200:[141]240:X[178]0
1160 [153]"PRINT  ....  CUTS, BROKEN BONES SYS"
1165 [133] A$
1170 [139]A$[178]"INJURIES"[167] [141]270:[141]402:[137]1185
1175 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1185
1180 Z[178]Z[170]1:[141]280:[137]1165
1185 [153]"               INJURIES "
1190 [141]300
1200 [143] # 5
1205 [141]200:[141]240:X[178]0
1210 [153]"PRINT  .... BOOKS, SHELVES, QUIET   SYS"
1215 [133] A$
1220 [139]A$[178]"LIBRARIES"[167] [141]270:[141]402:[137]1235
1225 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1235
1230 Z[178]Z[170]1:[141]280:[137]1215
1235 [153]"              LIBRARIES "
1240 [141]300
1249 :
1250 [143] # 6
1255 [141]200:[141]240:X[178]0
1260 [153]"PRINT     .... CARS, TRUCKS, BUSES   SYS"
1265 [133] A$
1270 [139]A$[178]"HIGHWAYS"[167] [141]270:[141]402:[137]1285
1275 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1285
1280 Z[178]Z[170]1:[141]280:[137]1265
1285 [153]"                HIGHWAYS  "
1290 [141]300
1300 [143] # 7
1305 [141]200:[141]240:X[178]0
1310 [153]"PRINT   .... FLASHLIGHTS, RADIOS   SYS"
1315 [133] A$
1320 [139]A$[178]"BATTERIES"[167] [141]270:[141]402:[137]1335
1325 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1335
1330 Z[178]Z[170]1:[141]280:[137]1315
1335 [153]"               BATTERIES "
1340 [141]300
1349 :
1350 [143] # 8
1355 [141]200:[141]240:X[178]0
1360 [153]"PRINT  .... HILLS, RIVERS     SYS"
1365 [133] A$
1370 [139]A$[178]"VALLEYS"[167] [141]270:[141]402:[137]1385
1375 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1385
1380 Z[178]Z[170]1:[141]280:[137]1365
1385 [153]"                 VALLEYS  "
1390 [141]300
1400 [143] # 9
1405 [141]200:[141]240:X[178]0
1410 [153]"PRINT  .... CANNED BEANS, CEREALS   SYS"
1415 [133] A$
1420 [139]A$[178]"GROCERIES"[167] [141]270:[141]402:[137]1435
1425 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1435
1430 Z[178]Z[170]1:[141]280:[137]1415
1435 [153]"               GROCERIES "
1440 [141]300
1449 :
1450 [143] # 10
1455 [141]200:[141]240:X[178]0
1460 [153]"PRINT  .... GRAPES, STRAWBERRIES  SYS"
1465 [133] A$
1470 [139]A$[178]"CHERRIES"[167] [141]270:[141]402:[137]1485
1475 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1485
1480 Z[178]Z[170]1:[141]280:[137]1465
1485 [153]"               CHERRIES "
1490 [141]300
1500 [143] # 11
1505 [141]200:[141]240:X[178]0
1510 [153]"PRINT  .... PEOPLE, HOUSES, NEIGHBOURS  SYS"
1515 [133] A$
1520 [139]A$[178]"COMMUNITIES"[167] [141]270:[141]402:[137]1535
1525 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1535
1530 Z[178]Z[170]1:[141]280:[137]1515
1535 [153]"             COMMUNITIES  "
1540 [141]300
1549 :
1550 [143] # 12
1555 [141]200:[141]240:X[178]0
1560 [153]"PRINT  ....  MYSTERIES, ADVENTURES     SYS"
1565 [133] A$
1570 [139]A$[178]"STORIES"[167] [141]270:[141]402:[137]1585
1575 [139]X[178]1[167][141]290:W[178]W[170]1:[141]402:[137]1585
1580 Z[178]Z[170]1:[141]280:[137]1565
1585 [153]"                STORIES  "
1590 [141]300
1600 [143] SCORE BOARD
1605 K[178]Z[171]W:C[178]12[171]Z
1610 [153]"LOADLEFT$ERE IS YOUR SCORE FOR (null)NIT STR$-15:"
1615 [153]"(null)UMBER OF QUESTIONS                     LEN(null)(null)(null)VALLEN(null) (null)(null) PRINTASCRIGHT$(null)(null)(null) (null)(null)(null)  "C
1620 [153]"(null)UMBER OF QUESTIONS                     LEN(null)(null)(null)VALLEN(null) (null)(null) SYS(null)VALLEN(null)(null)STR$ (null)(null)(null) "K
1625 [153]"(null)UMBER OF QUESTIONS                     LEN(null)(null)(null)VALLEN(null)CLOSE(null)(null)CLOSEDEF(null)LEFT$RIGHT$(null)STR$ (null)(null)(null)  "W
1630 [153]"":[141]403:[141]300
1650 :
1655 [153]"LOADSYS(null)OU NOW HAVE A CHOICE:
1660 PRINT"[208]RESS  R [146] TO REPEAT THIS UNIT
1665 [153]"(null)RESS  M WAIT TO RETURN TO THE DISK MENU
1670 GETR$:IFR$<>"R"ANDR$<>"M"GOTO1670
1675 IFR$="R"THENRESTORE:GOTO10
1680 PRINT"[147][210]ETURNING TO THE DISK [205][197][206][213]
1685 [147]"MENU",8
1690 [138]
1695 [128]
1700 [143] DESIGNED BY BILL CUMBERLAND 92:01:19
1710 [143] FOR MY GRANDSON, JAMIE.
1720 [143] SPELLING D - MODERN CURRICULUM PRESS
7056 [153]"  THE STATION?"